home *** CD-ROM | disk | FTP | other *** search
/ cyber.net interactivo 1996 September / inter@ivo 1996-09.iso / cybint8 / bin / montracd.dxr / 00094.ls < prev    next >
Encoding:
Text File  |  1996-08-02  |  278 b   |  18 lines
  1. on mouseUp
  2.   sound playFile 2, "..\som\power.wav"
  3.   onVis(4)
  4.   updateStage()
  5.   startTimer()
  6.   repeat while the timer < 30
  7.     nothing()
  8.   end repeat
  9.   onVis(5)
  10.   updateStage()
  11.   startTimer()
  12.   repeat while the timer < 30
  13.     nothing()
  14.   end repeat
  15.   onVis(4, 5)
  16.   go("esc")
  17. end
  18.